%%  Roots subset BL model German unempl data

abs(roots([0.5067 -0.2556 -0.0426  0 0 0 0 0 0 0.1261 -0.0874 1])) 
ans =

    1.0511
    1.0451
    1.0451
    1.1307
    1.1307
    1.0786
    1.0786
    1.0341
    1.0341
    1.0396
    1.0396

